home *** CD-ROM | disk | FTP | other *** search
/ PsL Monthly 1993 December / PSL Monthly Shareware CD-ROM (December 1993).iso / prgmming / dos / pascal / prginfo.com / PROGTEST.PAS < prev   
Encoding:
Pascal/Delphi Source File  |  1989-03-28  |  222 b   |  8 lines
  1.  
  2.   uses ProgInfo;
  3.  
  4.   begin
  5.     WriteLn('Program Name:         ',ProgName);
  6.     WriteLn('Environment Segment:  ',GetEnvSeg,' Decimal');
  7.     WriteLn('Dos Version:          ',lo(DosVersion),'.',hi(DosVersion));
  8.   end.